module parameters_mod
IMPLICIT NONE


INTEGER, parameter :: shocksN=10,kgridN = 175,KgridNegN=30,typesN=2,max_retire_working=35
INTEGER, parameter :: simulationsN=10000,skinkN=5
INTEGER, parameter ::  J=81, Jnr=47,max_tax_loop=1,max_outer_loops=95,max_non_clear=95
INTEGER :: household

DOUBLE PRECISION   :: kgrid(kgridN),epsilon1((Jnr-1),1),alpha1,alpha2,delta,tr,ss_ig(typesN,shocksN/2), sigma1,sigma2,sigma3,sigmay,pe
DOUBLE PRECISION   :: beta,chi,theta,lambdaa,tauss,lambda,energy_share,gamma1,ebar,ss_cap
DOUBLE PRECISION   :: lambda0,lambda1,lambda0_1,tauss_ig,tauss1,lambdak,avg_earnings_scale,adult_equivalence(J)

END module parameters_mod
